CAAIlluminatedFraction_PhaseAngle_1 <-
function(r, R, Delta){
.Call("CAAIlluminatedFraction_PhaseAngle_1", r, R, Delta)
}
